home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / source / term43-source.lha / Extras / Source / gtlayout-Source.lha / LTP_RPortAttrs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-10-21  |  956 b   |  58 lines
  1. /*  GadTools layout toolkit
  2. **
  3. **  Copyright © 1993-1994 by Olaf `Olsen' Barthel
  4. **  Freely distributable.
  5. */
  6.  
  7. #include "gtlayout_global.h"
  8.  
  9. VOID __regargs
  10. LTP_SetPens(struct RastPort *rp, UWORD apen, UWORD bpen,UBYTE mode)
  11. {
  12.     if(V39)
  13.         SetABPenDrMd(rp,apen,bpen,mode);
  14.     else
  15.     {
  16.         if(apen != rp -> FgPen)
  17.             SetAPen(rp,apen);
  18.  
  19.         if(bpen != rp -> BgPen)
  20.             SetBPen(rp,bpen);
  21.  
  22.         if(mode != rp -> DrawMode)
  23.             SetDrMd(rp,mode);
  24.     }
  25. }
  26.  
  27.  
  28. /*****************************************************************************/
  29.  
  30.  
  31. VOID __regargs
  32. LTP_SetAPen(struct RastPort *rp,UWORD apen)
  33. {
  34.     if(V39)
  35.     {
  36.         if(GetAPen(rp) != apen)
  37.             SetAPen(rp,apen);
  38.     }
  39.     else
  40.     {
  41.         if(apen != rp -> FgPen)
  42.             SetAPen(rp,apen);
  43.     }
  44. }
  45.  
  46.  
  47. /*****************************************************************************/
  48.  
  49.  
  50. VOID __regargs
  51. LTP_SetFont(LayoutHandle *handle,struct TextFont *font)
  52. {
  53.     SetFont(&handle -> RPort,font);
  54.  
  55.     if(handle -> Window)
  56.         SetFont(handle -> Window -> RPort,font);
  57. }
  58.